home *** CD-ROM | disk | FTP | other *** search
/ Aminet 19 / Aminet 19 (1997)(GTI - Schatztruhe)[!][Jun 1997].iso / Aminet / comm / cnet / cnet_toolkit.lha / routines / PMENU3 < prev    next >
Text File  |  1997-04-05  |  108b  |  3 lines
  1. PMENU: procedure;arg p,m;m=index("DFMNS",left(m,1))-1
  2.   getuser 2124552+(p*24);return bittst(d2c(result),m)
  3.